home *** CD-ROM | disk | FTP | other *** search
/ The Arsenal Files 6 / The Arsenal Files 6 (Arsenal Computer).ISO / business / splt231w.zip / THP7475.ZIP / T5-29.BAS < prev    next >
BASIC Source File  |  1991-07-21  |  427b  |  13 lines
  1. 10 OPEN "T5-29.PLT" FOR OUTPUT AS #1
  2. 20 DIM A$(40),B$(40),C$(40)
  3. 30 A$="THIS LABEL IS RIGHT JUSTIFIED"
  4. 40 PRINT #1,"IN;SP1;SM*;PA6000,5500;"
  5. 50 PRINT #1,"CP";-LEN(A$);"0;LB";A$+CHR$(3)
  6. 60 B$="THIS LABEL IS CENTERED BELOW THE POINT"
  7. 70 PRINT #1,"PA4500,5000;"
  8. 80 PRINT #1,"CP";-LEN(B$)/2;"-.5;LB";B$+CHR$(3)
  9. 90 C$="VERTICALY CENTERED LABEL"
  10. 100 PRINT #1,"PA2750,4500;"
  11. 110 PRINT #1,"CP0,-.25;LB";C$+CHR$(3)
  12. 120 END
  13.